From e5a1a2d24b437b74b39db9567f0bde09536ed1a9 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Sat, 26 Jul 2003 07:40:21 +0000 Subject: [PATCH] (quail-translate-key): Fix previous change. --- lisp/international/quail.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/international/quail.el b/lisp/international/quail.el index db7c53ba89f..36f597b36f8 100644 --- a/lisp/international/quail.el +++ b/lisp/international/quail.el @@ -1694,7 +1694,8 @@ sequence counting from the head." ;; No way to handle the last character in this context. (setq def (quail-map-definition (quail-lookup-key quail-current-key (1- len)))) - (setq quail-current-str (quail-get-current-str (1- len) def)) + (if def (setq quail-current-str + (quail-get-current-str (1- len) def))) (1- len)))))) (defun quail-next-translation () -- 2.30.2